AboutOn(cProgName,nVersion,nYear,[cUser],[cAuthor]) --> true:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Functions:
~~~~~~~~~~
1.The screen is stored for restoring by AboutOff()
2.Initial sytem window is painted
3.Clipper switch set to default value(date,confirm,...)
4.Help system activation
5.System necessary classes registration
6.Date and time request.

Parameter description:
~~~~~~~~~~~~~~~~~~~~~~
cProgName: program name to be painted in big capitals to initial screen
nVersion:  program version number
nYear:     creation year
cUser:     registered user name
cAuthor:   author name (symbol)

Return value:
~~~~~~~~~~~~~
allways true.

Source code is in file  Object1.prg